object OpenFolderForm: TOpenFolderForm Left = 394 Top = 147 BorderIcons = [biSystemMenu] BorderStyle = bsSingle Caption = 'Add Image files to compilation list' ClientHeight = 385 ClientWidth = 720 Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Default' Font.Style = [] OldCreateOrder = True Position = poScreenCenter OnPaint = FormPaint PixelsPerInch = 96 TextHeight = 13 object Bevel1: TBevel Left = 439 Top = 60 Width = 267 Height = 245 end object Label2: TLabel Left = 16 Top = 8 Width = 50 Height = 13 Caption = 'Directories' Transparent = True end object Label5: TLabel Left = 235 Top = 8 Width = 53 Height = 13 Caption = 'Image Files' Transparent = True end object Label4: TLabel Left = 440 Top = 40 Width = 70 Height = 13 Caption = 'Image Preview' Transparent = True end object PreviewImage: TImage Left = 440 Top = 61 Width = 264 Height = 242 Stretch = True end object SortChkBoxLbl: TLabel Left = 452 Top = 309 Width = 164 Height = 13 Cursor = crHandPoint Caption = ' &Zoom In (expand smaller pictures)' FocusControl = ZoomInChkBox Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False Transparent = True OnClick = SortChkBoxLblClick end object DriveComboBox1: TDriveComboBox Left = 16 Top = 24 Width = 219 Height = 22 Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 0 TextCase = tcUpperCase OnChange = DriveComboBox1Change end object FileListBox1: TFileListBox Left = 235 Top = 48 Width = 190 Height = 313 FileType = [ftReadOnly, ftHidden, ftSystem, ftVolumeID, ftNormal] Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -13 Font.Name = 'Default' Font.Style = [] ItemHeight = 16 Mask = '*.bmp;*.jpg;*.jpeg' MultiSelect = True ParentFont = False ParentShowHint = False PopupMenu = FileListMenu ShowGlyphs = True ShowHint = False TabOrder = 3 OnChange = FileListBox1Change end object DirOutline: TCDirectoryOutline Left = 16 Top = 48 Width = 219 Height = 313 TabStop = True OnChange = DirOutlineChange TextCase = tcAsIs Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [] ItemHeight = 16 Options = [ooDrawFocusRect, ooStretchBitmaps] ParentColor = False ParentFont = False PictureClosed.Data = {}